home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Format CD 43
/
Amiga Format CD43 (1999)(Future Publishing)(GB)(Track 1 of 2)[!][issue 1999-09].iso
/
-serious-
/
graphics
/
fxforge
/
flecktone
< prev
next >
Wrap
Text File
|
1999-06-15
|
767b
|
26 lines
Category: Filter Factory Gallery Q
Title: Flecktone...
Author: kangaroo@asan.com
Copyright: na
ctl[0]: amount
ctl[1]: offset side/side
ctl[2]: offset up/down
ctl[3]: glowtone
ctl[4]:
ctl[5]:
ctl[6]:
ctl[7]:
val[0]: 255
val[1]: 0
val[2]: 254
val[3]: 2
val[4]: 1
val[5]: 1
val[6]: 0
val[7]: 0
R:put(tan(dif(src(x+val(1,4,-4),y+val(2,4,-4),z),src(x,y,2))/3),0),put(tan(dif(src(x+val(1,5,-5),y+val(2,4,-5),z),src(x,y,2))/3)/2,1),put(val(0,c,(tan(min(dif(get(0),c)+c/2,i))/9)+30),2),val(3,get(2),(tan(min(dif(get(1),c)+c/2,i))/9)+get(2)/2)
G:put(val(0,c,(tan(min(dif(get(0),c)+c/2,i))/9)+30),2),val(3,get(2),(tan(min(dif(get(1),c)+c/2,i))/9)+get(2)/2)
B:put(val(0,c,(tan(min(dif(get(0),c)+c/2,i))/9)+30),2),val(3,get(2),(tan(min(dif(get(1),c)+c/2,i))/9)+get(2)/2)
A:a